home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
memory
/
emsaw41s.zip
/
TEST1C.C
< prev
next >
Wrap
Text File
|
1994-06-26
|
623b
|
28 lines
/* test1c.c */
#include <type400.c>
#include <\tc\include\stdio.h>
void main()
{
int A;
long totsiz, avsiz, index, bitnu, length, val1, val2;
EMINIT ();
SIZAR (&totsiz, &avsiz);
printf("%8lu %8lu\n",totsiz,avsiz);
NEWAR (&A, &avsiz);
index=avsiz;
val1=99999999L;
SETINT (&A, &index, &val1);
val2=GETINT (&A, &index);
printf("%8lu %8lu\n",val1,val2);
index=avsiz-2;
bitnu=7;
length=30;
SETF (&A, &index, &bitnu, &length, &val1);
val2=GETF (&A, &index, &bitnu, &length);
printf("%8lu %8lu\n",val1,val2);
FREEAR (&A);
printf("%8lu %8lu\n", totsiz, avsiz);
}